InterCD 2000 March/march_2000.iso/Site Building/HTMLcompress/HTMLComp.exe/HTMLCOMP.EXE/0/RCDATA/TFORM3/TFORM3.txt

Text File | 1999-09-02 | 14.0 KB | 608 lines

object Form3: TForm3
  Left = 289
  Top = 155
  HelpContext = 1
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsDialog
  Caption = 'HTML (Un)Compress'
  ClientHeight = 452
  ClientWidth = 631
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 120
  TextHeight = 16
  object Registration: TLabel
    Left = 140
    Top = 10
    Width = 350
    Height = 70
    Caption = 'Registration'
    Color = clBtnFace
    Font.Charset = ANSI_CHARSET
    Font.Color = 10658466
    Font.Height = -60
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentColor = False
    ParentFont = False
  end
  object Bevel1: TBevel
    Left = 8
    Top = 408
    Width = 617
    Height = 9
    Shape = bsBottomLine
  end
  object Label22: TLabel
    Left = 40
    Top = 56
    Width = 491
    Height = 16
    Caption =
      'To register the HTML (Un)Compress tool through me, follow these ' +
      'few simple steps:'
    Color = clBtnFace
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clInfoText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentColor = False
    ParentFont = False
    Transparent = True
    Visible = False
  end
  object Panel3: TPanel
    Left = 0
    Top = 80
    Width = 625
    Height = 329
    BevelOuter = bvNone
    TabOrder = 4
    Visible = False
    object Label18: TLabel
      Left = 88
      Top = 8
      Width = 505
      Height = 81
      AutoSize = False
      Caption = 'Boe'
      WordWrap = True
    end
    object Label19: TLabel
      Left = 88
      Top = 96
      Width = 330
      Height = 16
      Caption = 'The page of HTML (Un)Compress on E-Barn should be:'
    end
    object Label20: TLabel
      Left = 88
      Top = 176
      Width = 513
      Height = 33
      AutoSize = False
      Caption =
        'If for some reason, this page could not be found, or you just do' +
        'n'#39't feel like using that long URL, go to E-Barn`s homepage and s' +
        'earch for "html (un)compress" (no quotes)'
      WordWrap = True
    end
    object Label21: TLabel
      Left = 88
      Top = 144
      Width = 303
      Height = 16
      Caption = '(RightClick Copy and then paste it in your browser)'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsItalic]
      ParentFont = False
    end
    object Edit3: TEdit
      Left = 88
      Top = 120
      Width = 273
      Height = 24
      Color = clBtnFace
      ReadOnly = True
      TabOrder = 0
      Text = 'http://www.ebarn.com/cgi-bin/tracker?PROD_ID=266&PLATFORM_ID=1'
    end
    object Edit4: TEdit
      Left = 88
      Top = 216
      Width = 273
      Height = 24
      Color = clBtnFace
      ReadOnly = True
      TabOrder = 1
      Text = 'http://www.ebarn.com/'
    end
  end
  object Button3: TButton
    Left = 448
    Top = 424
    Width = 81
    Height = 26
    Caption = '&Next >'
    Default = True
    Enabled = False
    TabOrder = 0
    OnClick = Button3Click
  end
  object Button1: TButton
    Left = 544
    Top = 424
    Width = 81
    Height = 26
    Cancel = True
    Caption = '&Close'
    TabOrder = 1
    OnClick = Button1Click
  end
  object Panel1: TPanel
    Left = 8
    Top = 80
    Width = 617
    Height = 329
    BevelOuter = bvNone
    TabOrder = 2
    object Label2: TLabel
      Left = 88
      Top = 0
      Width = 513
      Height = 73
      AutoSize = False
      Caption = 'Boe'
      Transparent = True
      WordWrap = True
    end
    object Label3: TLabel
      Left = 88
      Top = 72
      Width = 513
      Height = 57
      AutoSize = False
      Caption =
        'I have here described some things which are according to me pro'#39 +
        's and contra'#39's of each system. I don'#39't have any preference, so y' +
        'ou can choose for yourself. Select one of the two options and th' +
        'en push Next.'
      Transparent = True
      WordWrap = True
    end
    object Label4: TLabel
      Left = 112
      Top = 152
      Width = 493
      Height = 16
      Caption =
        '+ You'#39're working with an internationaly known company, you have ' +
        'a lot of guarantee.'
      WordWrap = True
    end
    object Label5: TLabel
      Left = 112
      Top = 168
      Width = 443
      Height = 16
      Caption =
        '+ You can pay in a lot of different ways (Credit Cards, Cheques,' +
        ' you name it)'
    end
    object Label6: TLabel
      Left = 112
      Top = 184
      Width = 289
      Height = 16
      Caption = '+ You can register 24 hours a day, 7 days a week'
    end
    object Label7: TLabel
      Left = 112
      Top = 200
      Width = 51
      Height = 16
      Caption = '- It costs '
    end
    object Label8: TLabel
      Left = 168
      Top = 200
      Width = 53
      Height = 16
      Caption = '25 USD'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label9: TLabel
      Left = 224
      Top = 200
      Width = 206
      Height = 16
      Caption = '(And only US Dollars, nothing else)'
    end
    object Label10: TLabel
      Left = 531
      Top = 224
      Width = 70
      Height = 16
      Alignment = taRightJustify
      Caption = '(That'#39's me!)'
    end
    object Label11: TLabel
      Left = 112
      Top = 248
      Width = 51
      Height = 16
      Caption = '+ It costs'
    end
    object Label12: TLabel
      Left = 168
      Top = 248
      Width = 53
      Height = 16
      Caption = '20 USD'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label13: TLabel
      Left = 224
      Top = 248
      Width = 162
      Height = 16
      Caption = '35DM, 15�, 40HFl, 700BF, ...'
    end
    object Label14: TLabel
      Left = 111
      Top = 264
      Width = 498
      Height = 16
      Caption =
        '+ You can pay in every currency you like, just calculate an amou' +
        'nt about equal to 20$'
    end
    object Label15: TLabel
      Left = 112
      Top = 281
      Width = 391
      Height = 16
      Caption =
        '- You can only pay with cash, a traveler cheque or a postal cheq' +
        'ue'
    end
    object Label16: TLabel
      Left = 112
      Top = 297
      Width = 233
      Height = 16
      Caption = '- You have to send it to me by snail mail'
    end
    object Label17: TLabel
      Left = 112
      Top = 312
      Width = 224
      Height = 16
      Caption = '- I can only serve you in the weekends'
    end
    object RadioButton1: TRadioButton
      Left = 88
      Top = 128
      Width = 513
      Height = 17
      Caption = 'Paying through TUCOWS'#39' E-Barn'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      OnClick = RadioButton1Click
    end
    object RadioButton2: TRadioButton
      Left = 88
      Top = 224
      Width = 329
      Height = 17
      Caption = 'Directly paying to the author'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      OnClick = RadioButton2Click
    end
  end
  object Panel2: TPanel
    Left = 8
    Top = 80
    Width = 617
    Height = 329
    BevelOuter = bvNone
    TabOrder = 3
    Visible = False
    object Label23: TLabel
      Left = 32
      Top = 0
      Width = 205
      Height = 16
      Caption = '1. Copy the Registration Form'
      Color = clBtnFace
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
    end
    object Label24: TLabel
      Left = 56
      Top = 24
      Width = 273
      Height = 32
      Caption =
        'Push the button on the right and the registration form will be c' +
        'opied to the clipboard'
      WordWrap = True
    end
    object Label25: TLabel
      Left = 32
      Top = 80
      Width = 180
      Height = 16
      Caption = '2. Go to your E-Mail editor'
      Color = clBtnFace
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
    end
    object Label26: TLabel
      Left = 56
      Top = 104
      Width = 246
      Height = 16
      Caption = 'In your E-Mail editor, compose a new mail'
      WordWrap = True
    end
    object Labe217: TLabel
      Left = 32
      Top = 136
      Width = 145
      Height = 16
      Caption = '3. Fill out your E-Mail'
      Color = clBtnFace
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
    end
    object Label28: TLabel
      Left = 56
      Top = 217
      Width = 269
      Height = 64
      Caption =
        'Then go to the Edit-menu, choose Paste, and paste the registrati' +
        'on form as your E-Mail body. (you can also find the form in the ' +
        'file: REGFORM.TXT)'
      WordWrap = True
    end
    object Label29: TLabel
      Left = 32
      Top = 281
      Width = 215
      Height = 16
      Caption = '4. Fill out the Registration Form'
      Color = clBtnFace
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
    end
    object Label210: TLabel
      Left = 56
      Top = 297
      Width = 249
      Height = 32
      Caption = 'Fill out the Registration form in your E-Mail Editor.'
      WordWrap = True
    end
    object Label211: TLabel
      Left = 56
      Top = 160
      Width = 20
      Height = 16
      Caption = 'To:'
    end
    object Label212: TLabel
      Left = 56
      Top = 192
      Width = 48
      Height = 16
      Caption = 'Subject:'
    end
    object Label213: TLabel
      Left = 344
      Top = 0
      Width = 101
      Height = 16
      Caption = '5. Send E-Mail'
      Color = clBtnFace
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
    end
    object Label214: TLabel
      Left = 368
      Top = 24
      Width = 195
      Height = 16
      Caption = 'Now, just send your E-Mail to me.'
      WordWrap = True
    end
    object Label215: TLabel
      Left = 344
      Top = 64
      Width = 128
      Height = 16
      Caption = '6. Send the money'
      Color = clBtnFace
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentColor = False
      ParentFont = False
    end
    object Label216: TLabel
      Left = 360
      Top = 88
      Width = 241
      Height = 64
      Caption =
        'I will send cash 20 US Dollar, 35DM, 20�, 15�, 40HFl, 700BF or a' +
        'bout the same amount in no matter what currency, a traveler chec' +
        'k or a postal check to:'
      WordWrap = True
    end
    object Label218: TLabel
      Left = 336
      Top = 241
      Width = 273
      Height = 80
      Caption =
        'Once I have received your E-Mail and I have received the money i' +
        'n your own local currency equal to 20$, traveler check or postal' +
        ' check I will send you a password by E-Mail. This password allow' +
        's you to use this tool for ever. '
      WordWrap = True
    end
    object Edit2: TEdit
      Left = 112
      Top = 192
      Width = 217
      Height = 24
      TabStop = False
      ParentColor = True
      ReadOnly = True
      TabOrder = 0
      Text = 'HTML (Un)Compress Registration'
    end
    object Edit1: TEdit
      Left = 112
      Top = 160
      Width = 217
      Height = 24
      TabStop = False
      ParentColor = True
      TabOrder = 1
      Text = '[e-mail]'
    end
    object Memo1: TMemo
      Left = 360
      Top = 160
      Width = 249
      Height = 73
      TabStop = False
      Color = clBtnFace
      Lines.Strings = (
        'Jan Jacobs'
        'Gemeentestraat 8'
        '2360 Oud-Turnhout'
        'Belgium')
      ReadOnly = True
      TabOrder = 2
    end
    object Button4: TButton
      Left = 240
      Top = 0
      Width = 81
      Height = 25
      Caption = 'Copy Form'
      TabOrder = 3
      OnClick = Button2Click
    end
    object Memo2: TMemo
      Left = 272
      Top = 272
      Width = 137
      Height = 41
      Lines.Strings = (
        'HTML (Un)Compress Registration'
        '=============================='
        ''
        'Last Name:'
        'First Name:'
        ''
        'Company:'
        ''
        'Street and #:'
        'City:'
        'State:'
        'Postal code:'
        'Country:'
        ''
        'E-Mail:'
        ''
        '[ ] I will send cash 20 US Dollar, 35DM, 15�, 40HFl,'
        '    700BF or about the same amount in no matter what'
        '    currency, a traveler check or a postal check to:'
        '         Jan Jacobs'
        '         Gemeentestraat 8'
        '         2360 Oud-Turnhout'
        '         Belgium'
        ''
        '    on thus receive a password by E-Mail'
        ''
        'Please send this form to [e-mail] by E-Mail')
      TabOrder = 4
      Visible = False
      WordWrap = False
    end
  end
  object Button5: TButton
    Left = 360
    Top = 424
    Width = 81
    Height = 25
    Caption = '< &Back'
    Enabled = False
    TabOrder = 5
    OnClick = Button5Click
  end
end